program Backup;

{$mode objfpc}{$H+}

uses
  // for multi threading the cthreads unit must be used on unix systems:
  {$IFDEF UNIX}
  cthreads,
  {$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, RunTimeTypeInfoControls, SDFLaz, DBFLaz, SQLDBLaz, UBackup,
  Uconfiguracao, Translations;

begin
  //definio a tradução para português
  TranslateUnitResourceStrings ( 'LclStrConsts',
  {$IFDEF WIN32}
     'c:\lazarus\lcl\languages\lclstrconsts.pb.po', 'pb', '');
  {$ENDIF}
  {$IFDEF UNIX}
     '/usr/lib/lazarus/0.9.28.2/lcl/languages/lclstrconsts.pb.po', 'pb', '');
  {$ENDIF}

  Application.Initialize;
  Application.Createform(Tformbackup, Formbackup);
  Application.Run;
end.

